home *** CD-ROM | disk | FTP | other *** search
/ Delphi Developer's Kit 1996 / Delphi Developer's Kit 1996.iso / power / source9 / scratch / mscomm / main.dfm / main.txt
Encoding:
Text File  |  1995-12-22  |  2.2 KB  |  106 lines
  1. object frmMain: TfrmMain
  2.   Left = 185
  3.   Top = 441
  4.   Width = 344
  5.   Height = 238
  6.   HorzScrollBar.Visible = False
  7.   VertScrollBar.Visible = False
  8.   Caption = 'TComm Demo'
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'System'
  12.   Font.Style = []
  13.   Menu = MainMenu1
  14.   PixelsPerInch = 96
  15.   Position = poScreenCenter
  16.   OnResize = FormResize
  17.   TextHeight = 16
  18.   object memIn: TMemo
  19.     Left = 0
  20.     Top = 0
  21.     Width = 336
  22.     Height = 89
  23.     Color = clBtnFace
  24.     Enabled = False
  25.     Font.Color = clBlack
  26.     Font.Height = -11
  27.     Font.Name = 'MS Sans Serif'
  28.     Font.Style = []
  29.     Lines.Strings = (
  30.       '')
  31.     ParentFont = False
  32.     TabOrder = 0
  33.   end
  34.   object memOut: TMemo
  35.     Left = 0
  36.     Top = 136
  37.     Width = 336
  38.     Height = 49
  39.     Color = clBtnFace
  40.     Enabled = False
  41.     Font.Color = clBlack
  42.     Font.Height = -11
  43.     Font.Name = 'MS Sans Serif'
  44.     Font.Style = []
  45.     ParentFont = False
  46.     TabOrder = 1
  47.     OnKeyPress = memOutKeyPress
  48.   end
  49.   object MainMenu1: TMainMenu
  50.     Left = 259
  51.     Top = 99
  52.     object File1: TMenuItem
  53.       Caption = '&File'
  54.       object Exit1: TMenuItem
  55.         Caption = '&Exit'
  56.         Hint = 'Exit this program'
  57.         OnClick = Exit1Click
  58.       end
  59.     end
  60.     object Port1: TMenuItem
  61.       Caption = '&Port'
  62.       object Configure1: TMenuItem
  63.         Caption = '&Configure...'
  64.         Hint = 'Change serial settings'
  65.         OnClick = Configure1Click
  66.       end
  67.       object N1: TMenuItem
  68.         Caption = '-'
  69.       end
  70.       object Open1: TMenuItem
  71.         Caption = '&Open'
  72.         OnClick = Open1Click
  73.       end
  74.       object Close1: TMenuItem
  75.         Caption = '&Close'
  76.         Enabled = False
  77.         OnClick = Close1Click
  78.       end
  79.     end
  80.     object Help1: TMenuItem
  81.       Caption = '&Help'
  82.       object About1: TMenuItem
  83.         Caption = '&About...'
  84.         Hint = 'Show information about this app'
  85.         OnClick = About1Click
  86.       end
  87.     end
  88.   end
  89.   object MSComm1: TMSComm
  90.     Port = 2
  91.     BaudRate = br9600
  92.     ParityBits = pbNone
  93.     DataBits = dbEight
  94.     StopBits = sbOne
  95.     FlowControl = fcNone
  96.     TxBufSize = 2048
  97.     RxBufSize = 2048
  98.     RxFullCount = 1024
  99.     TxLowCount = 1024
  100.     Events = []
  101.     OnReceive = MSComm1Receive
  102.     Left = 228
  103.     Top = 100
  104.   end
  105. end
  106.